Python - Perl - Tcl

#Create a numeric variable
set myNumber 5;

#Create a string
set myString "Hello World";

#Create a new numeric and assign the original to it
set myNewNumber $myNumber;

#Create a numeric variable
myNumber = 5;

#Create a string
myString = "Hello World";

#Create a new numeric and assign the original to it
myNewNumber = myNumber;

#Create a numeric variable
my $myNumber = 5;

#Create a string
my $myString = "Hello World";

#Create a new numeric and assign the original to it
my $myNewNumber = $myNumber;